//---------------------------------------------------------------------------
#include <vcl\vcl.h>
#pragma hdrstop

#include "Close.h"
//---------------------------------------------------------------------------
#pragma resource "*.dfm"
TFormClose *FormClose;
//---------------------------------------------------------------------------
__fastcall TFormClose::TFormClose(TComponent* Owner)
	: TForm(Owner)
{
	CanClose = false;
}
//---------------------------------------------------------------------------
void __fastcall TFormClose::Button2Click(TObject *Sender)
{
	CanClose = false;
	Close();
}
//---------------------------------------------------------------------------
void __fastcall TFormClose::Button1Click(TObject *Sender)
{
	if ( Edit1->Text =="3.14159265")
		CanClose = true;
    else CanClose = false;
    Close();
}
//---------------------------------------------------------------------------